//	S_TAB_N_TRIM_MAN.hsp

/*title this*/_4title=__FILE__:split _4title,".",_4title:title _4title.0

 #module
#defcfunc ts_strtrim_L str p
	s=p
	t=p
	while 1
//	E[̔pXy[X菜
		s=strtrim(s,1,' ')
//	E[̃^u菜
		s=strtrim(s,1,'\t')
//	QstrtrimĂgςȂ_break
		if s==t:_break
		t=s
	wend
	return s
#global

//	Opmesboxp
sdim s,65000
//	m[gpbhp
sdim t,65000

objsize 100,20
button "s",*_do
pos 100,0
button "WRITE_LINE",*_do_exec
pos 0,20
	font "",18
	objmode 2
//	sg̑Opmesbox
	mesbox s,600,455,5
	ID4mesbox=stat
	
	stop
*_do
	t=s
	notesel t
	repeat notemax
	tmp_A=""
	tmp_B=""
	noteget tmp_A,cnt
	tmp_B=ts_strtrim_L(tmp_A)
	noteadd tmp_B,cnt,1
	loop
//	notepadۑ
	notesave "tmp.txt"
*_do_trim_N
	i=0
	for i,0,notemax,1
	tmp_A=""
	tmp_B=""
	noteget tmp_A,i
	if strlen(tmp_A)==0{
		if i < notemax {
			notedel i
			i-=1
	}	}
	next
//	notepadۑ
	notesave "tmp.txt"
//	𗘗pĕ\
	exec "notepad tmp.txt"
	stop
*_do_exec
	exec "Ys_B03\\WRITE_LINE.exe"
	stop
	